//===== eAthena Script ======================================= 
//= Wizard Skills Quests
//===== By: ================================================== 
//= Lupus, Reddozen
//=                 2007-02-25  ¦p  
//===== Current Version: ===================================== 
//= 1.3c
//===== Compatible With: ===================================== 
//= eAthena Revision 3800+
//===== Description: ========================================= 
//= Temp quests for new skills for 2nd classes
//===== Additional Comments: ================================= 
//= 1.0 for fully working skills only [Lupus]
//= 1.1 Added more new skill quests for more classes [Lupus]
//= Somehow eA engine doesn't let you keep learn't skill V_V'
//= 1.2 Added to correct locations, correct NPC's, fixed
//= some of the items required and made them into real
//= quests. [Reddozen] 
//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
//= 1.3b Splitted into different files [DracoRPG]
//= 1.3c Removed duplicates [Toms]
//============================================================


//============================================================
// Ův - 
//============================================================
gef_tower,115,36,1	script	pp#2	876,{
	set @npcname$,"[pp]";
	if(HELLIONQ == 22)goto L_remember;
	if(HELLIONQ == 21)goto L_joke;
	if(HELLIONQ == 20)goto L_take;
	if(BaseJob!=Job_Wizard) goto L_nowiz;
	if(getskilllv(1006)) goto L_alreadyhave;

	mes @npcname$;
	mes "ڳoIFڱNЧAӷsޯ:";
	mes "10 Fq";
	mes "10 Fq";
	mes "10 Fq";
	mes "10 aFq";
	next;
	
	mes @npcname$;
	mes "ڨˬdUAF@~";
	next;
	
	if(countitem(990)<10 || countitem(991)<10 || countitem(992)<10 || countitem(993)<10) goto L_noitems;//Items: Red_Blood, Crystal_Blue, Wind_of_Verdure, Green_Live,
	delitem 990, 10;//Items: Red_Blood,
	delitem 991, 10;//Items: Crystal_Blue,
	delitem 992, 10;//Items: Wind_of_Verdure,
	delitem 993, 10;//Items: Green_Live,
	
	mes @npcname$;
	mes "AaӤFF~";
	mes "{bڶ}lЧAsޯ~.";
	skill 1006,1,0;
	close;

L_take:
	mes @npcname$;
	mes "֦\F... ֦\F...!";
	mes "ӪFhF?!";
	mes "K, iHڮ@U䪺F?";
	mes "x... ... AO??";
	next;
	menu "¸sڨӸA",L_sent,"~n! Aۤv!",-;

	mes @npcname$;
	mes "ۤv? ѴNbAӤw!";
	mes "Ӧ?";
	mes "F... }!";
	mes "Abo̥u|êڪsӤw!!";
	close;

L_sent:
	mes @npcname$;
	mes "ڪѮv? ¸?";
	mes "... T꦳i٨SL!";
	mes "isӵ...?";
	next;
	input @tempstr$;
	if(@tempstr$ != "Na]ͺAs")goto L_wrongstr;

	mes @npcname$;
	mes "Na]ͺAs?";
	mes "iOѮvTѫewgF!";
	mes "DLѰOF?";
	next;
	mes @npcname$;
	mes "_!";
	mes "Ѯv٦b䨺i?";
	mes "ڤTѫeTwg浹LF!!";
	set HELLIONQ,21;
	close;

L_joke:
	mes @npcname$;
	mes "ڷQѮvKb}...!";
	mes "F... ڬݧAA@LnF...";
	mes "Ӧ! ڧƥihF??";
	close;

L_wrongstr:
	mes @npcname$;
	mes @tempstr$ + "?";
	mes "ڨSLoӬs!";
	mes "٬OڥHeLO...?";
	mes "`! ڻݭniTW٤~!";
	close;

L_remember:
	mes @npcname$;
	mes "! ! SOA!";
	mes "ڪѮvSnAӸڮiF?";
	next;
	mes "^3151FFA¸nA檺ѮR";
	next;
	mes @npcname$;
	mes "! ӦnF!";
	mes "oѧڤepߧ˥F!";
	mes "uOӷP§AF!";
	mes "oUڲשiHoӬsF!";
	next;
	mes @npcname$;
	mes "! ̭n@O? 򤣨F!";
	mes "@iѮvڪȱ... ...";
	mes " ";
	mes "^111111RAAQ^o@?";
	mes "@~īGĨӸڥ洫a!";
	mes "                        ¸^000000";
	next;
	mes @npcname$;
	mes "~~~!!";
	mes "SӤF~~~!!";
	mes "LѷR}oت?!";
	mes "īG!!";
	mes "ڻݭnīG!!";
	next;
	mes "ݨӲ{biHh@";
	mes "^3151FFŦ]Oq^000000";
	mes "^h浹¸F!";
	set HELLIONQ,23;
	close;
		
L_noitems:
	mes @npcname$;
	mes "A٨SaD.";
	mes "AFAӧڧa";
	close;
	
L_nowiz:
	mes @npcname$;
	mes "A@wn]O~~.";
	emotion e_gasp;
	close;

L_alreadyhave:
	mes @npcname$;
	mes "ڤwgйLA~I";
	close;
}

prt_in,82,98,2	script	ɺȴ	46,{
	mes "[ɺȴ]";
	mes "??????????????I";
	close;
}